object SoundForm: TSoundForm Left = 263 Top = 115 HelpContext = 41015 ActiveControl = OKBtn BorderStyle = bsDialog Caption = 'Change Sounds (WAV Files)' ClientHeight = 399 ClientWidth = 394 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] PixelsPerInch = 96 Position = poScreenCenter TextHeight = 13 object Bevel1: TBevel Left = 8 Top = 8 Width = 377 Height = 345 Shape = bsFrame IsControl = True end object Label1: TLabel Left = 16 Top = 32 Width = 121 Height = 16 Hint = 'This is the sound that plays when you get the Power Meter to 100' + '%.' Caption = 'Blackjack Sound:' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True end object Label2: TLabel Left = 16 Top = 128 Width = 87 Height = 16 Hint = 'This is a sound which plays on a losing spin.' Caption = 'Lose Sound:' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True end object Label4: TLabel Left = 16 Top = 80 Width = 123 Height = 16 Hint = 'This is a sound that plays when you get a Power Play symbol on t' + 'he screen.' Caption = 'Card Deal Sound:' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True end object Label5: TLabel Left = 16 Top = 170 Width = 79 Height = 16 Hint = 'This is a sound which plays on a winning spin.' Caption = 'Win Sound:' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True end object Label3: TLabel Left = 16 Top = 218 Width = 100 Height = 16 Hint = 'This is a sound which plays on a winning spin.' Caption = 'Shuffle Sound:' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True end object OKBtn: TBitBtn Left = 56 Top = 364 Width = 281 Height = 27 HelpContext = 41015 Caption = '&OK' TabOrder = 0 OnClick = OKBtnClick Kind = bkOK Margin = 2 Spacing = -1 IsControl = True end object Button1: TButton Left = 176 Top = 24 Width = 81 Height = 25 Hint = 'Click this button to browse your hard drive for a sound for this' + ' event.' HelpContext = 41015 Caption = 'Change' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 1 OnClick = Button1Click end object Button2: TButton Left = 176 Top = 120 Width = 81 Height = 25 Hint = 'Click this button to browse your hard drive for a sound for this' + ' event.' HelpContext = 41015 Caption = 'Change' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 2 OnClick = Button2Click end object Button4: TButton Left = 176 Top = 72 Width = 81 Height = 25 Hint = 'Click this button to browse your hard drive for a sound for this' + ' event.' HelpContext = 41015 Caption = 'Change' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 3 OnClick = Button4Click end object Button5: TButton Left = 176 Top = 168 Width = 81 Height = 25 Hint = 'Click this button to browse your hard drive for a sound for this' + ' event.' HelpContext = 41015 Caption = 'Change' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 4 OnClick = Button5Click end object Button6: TButton Left = 288 Top = 24 Width = 81 Height = 25 Hint = 'Click this button to play the currently selected sound file.' HelpContext = 41015 Caption = 'Preview' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 5 OnClick = Button6Click end object Button7: TButton Left = 288 Top = 120 Width = 81 Height = 25 Hint = 'Click this button to play the currently selected sound file.' HelpContext = 41015 Caption = 'Preview' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 6 OnClick = Button7Click end object Button9: TButton Left = 288 Top = 72 Width = 81 Height = 25 Hint = 'Click this button to play the currently selected sound file.' HelpContext = 41015 Caption = 'Preview' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 7 OnClick = Button9Click end object Button10: TButton Left = 288 Top = 168 Width = 81 Height = 25 Hint = 'Click this button to play the currently selected sound file.' HelpContext = 41015 Caption = 'Preview' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 8 OnClick = Button10Click end object Button11: TButton Left = 16 Top = 304 Width = 353 Height = 33 Hint = 'Click this button to use the default (original) sounds for the a' + 'bove events.' HelpContext = 41015 Caption = 'Restore Default Sounds' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 9 OnClick = Button11Click end object Button3: TButton Left = 176 Top = 216 Width = 81 Height = 25 Hint = 'Click this button to browse your hard drive for a sound for this' + ' event.' HelpContext = 41015 Caption = 'Change' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 10 OnClick = Button3Click end object Button8: TButton Left = 288 Top = 216 Width = 81 Height = 25 Hint = 'Click this button to play the currently selected sound file.' HelpContext = 41015 Caption = 'Preview' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 11 OnClick = Button8Click end object OpenDialog1: TOpenDialog Left = 15 Top = 363 end end